home *** CD-ROM | disk | FTP | other *** search
/ Real Girls - Strip Poker / Real Girls Strip POker (Windows 95 CD-ROM).iso / _SETUP.1 / mui2.dxr / 00001.ls next >
Encoding:
Text File  |  1998-07-30  |  351 b   |  12 lines
  1. on muiLoseGame
  2.   global alertResult
  3.   set alertObj to new(xtra("MUI"))
  4.   set alertInitList to [#buttons: #Ok, #default: 1, #title: "RealGirls", #message: "You lost all your clothes! Game over.", #movable: 0]
  5.   if objectp(alertObj) then
  6.     set result to alert(alertObj, alertInitList)
  7.     tell the stage
  8.       afterLoseBox()
  9.     end tell
  10.   end if
  11. end
  12.